(** 
    Depth.mli
    Compute the Depth-first search until a depth of N.

    Bozman Çagdas <bozman.cagdas@gmail.com> - 2011
    Razakamiadana Tefin <tefy.razaka@gmail.com>   - 2011
*)

(** dfs page n computes a depth-first search until n. *)
val dfs : string -> int -> bool ref -> Sets.StringSet.t
